home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / c64-preservation-project / apps / super_c[data_becker_1985](v2_01).nbz / stdio.h < prev    next >
Encoding:
Text File  |  2019-04-13  |  1.5 KB  |  61 lines
  1. äüù/* LIBRARY HEADERFILE FOR 'LIBC.L' AND 'LIBCS.L' */
  2. ù/*     ├-├OMPILER ╓2 ╨ROFI-├/╙UPER-├             */
  3. ü
  4. ò#DEFINE ╙╘─╔╧  0
  5. ò#DEFINE ╬╒╠╠   0
  6. ò#DEFINE ├╥     '\N'
  7. ò#DEFINE ├╥╙╒╨  '\221'
  8. ò#DEFINE ├╥╙─╧╫╬    '\21'
  9. ò#DEFINE ├╥╙╥╔╟╚╘   '\35'
  10. ò#DEFINE ├╥╙╠┼╞╘    '\235'
  11. ò#DEFINE ─┼╠┼╘┼     '\B'
  12. ò#DEFINE ╔╬╙┼╥╘     '\224'
  13. ò#DEFINE ╚╧═┼   '\23'
  14. ò#DEFINE ├╠╥    '\223'
  15. ò#DEFINE ╥┼╓┼╥╙╧╬   '\22'
  16. ò#DEFINE ╥┼╓┼╥╙╧╞╞  '\222'
  17. ò
  18. ò#DEFINE ╬╔╠    0
  19. ò#DEFINE ┼═╨╘┘  ""
  20. ò#DEFINE ═┴╪╔╬╘ 32767
  21. ò#DEFINE ═┴╪╠╧╬╟    2147483647╠
  22. ò
  23. ò#DEFINE ╙╘     (*(CHAR*)0X90)
  24. ò#DEFINE ┼╧╞    (╙╘ & 0X40)
  25. ò
  26. ò#DEFINE PUTCHAR(╪0)    PUTC(╪0,╙╘─╔╧)
  27. ò#DEFINE CMOVE(╪1,╪2,╪3) MOVE(╪1,╪2,╪3,0X35)
  28. ÿ
  29. ÿTYPEDEF INT FILE;
  30. ÿ
  31. ÿEXTERN FILE OPEN(),CLOSE(),FOPEN(),FCLOSE();
  32. ÿEXTERN INT  PUTC(),GETC(),FGETC(),FPUTC();
  33. ÿEXTERN CHAR *GETS(),*FGETS();
  34. ÿEXTERN INT  PUTS(),FPUTS(),FGETF(),FPUTF();
  35. ÿEXTERN VOID ERRON(),ERROFF(),NMION(),NMIOFF();
  36. ÿEXTERN VOID ERROR(),EXIT();
  37. ÿEXTERN INT  QERROR();
  38. ÿEXTERN VOID CURSOR(),MOVE(),EXEC();
  39. ÿEXTERN INT  STRLEN(),STRCMP(),STRNCMP();
  40. ÿEXTERN CHAR *STRCAT(),*STRNCAT(),*STRCPY(),*STRNCPY();
  41. ÿEXTERN CHAR *STRCHR(),*STRRCHR();
  42. ÿEXTERN CHAR *ALLOC(),*FREE();
  43. ÿEXTERN CHAR *SETTIME(),*GETTIME();
  44. ÿEXTERN INT  KEYS();
  45. ÿEXTERN LONG CALL();
  46. ÿ
  47. ÿEXTERN VOID PRINTF(),SPRINTF(),FPRINTF();
  48. ÿEXTERN INT  SCANF(), SSCANF(), FSCANF();
  49. ÿ
  50. ÿCHAR (*SCREEN)[40] = 0XE000;
  51. ÿCHAR (*COLOR )[40] = 0XD800;
  52. ÿCHAR (*CHARRAM1)[8]= 0XD000;
  53. ÿCHAR (*CHARRAM2)[8]= 0XD800;
  54. ÿ
  55. üCHAR GETCHAR()
  56. ÿ█  CHAR C;
  57. ù
  58. ù   WHILE((C=GETC(╙╘─╔╧))==0);
  59. ù   RETURN C;
  60. ù▌